|
AutoCAD VBA : Bereinigen einer Zeichnung
CADmium am 30.09.2008 um 08:12 Uhr (0)
mit der Methode PURGEALL des entspechenden DOCUMENTS ..Ich zitiere das Beispiel aus der Hilfe ( in die einfach ab und zu mal reingekuckt werden sollte )Sub Example_PurgeAll() This example removes all unused named references from the database ThisDrawing.PurgeAll End Sub------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Variable aus Modul mit Zeichnung speichern
CADmium am 09.01.2007 um 07:57 Uhr (0)
du kannst dir auch ein Dictionary anlegen und in diesem die Daten z.B: in einem XRECORD speichern... geht aber auch alles per Lisp ( genauso wie XDATA) für Dictionaries und Xrecord findest du ein Beispiel in der Onlinehilfe..:Sub Example_AddXRecord() This example creates a new XRecord if one doesnt exist, appends data to the XRecord, and then reads it back. To see data being added, run the example more than once. Dim TrackingDictionary As AcadDictionary, TrackingXRecord As AcadXRecord Dim XRecord ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Pfadabfrage
CADmium am 08.03.2007 um 19:46 Uhr (0)
gespeichert hast du die Zeichnung aber schon mal ?------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Layout oder Modell
CADmium am 28.08.2008 um 08:19 Uhr (0)
...Die systemvariable CTAB liefert die das aktuelle Layout.du kannst die einzelnen Layouts der Layoutcollectione der aktuellen Zeichnung durchlaufen ... deren "Block" ermitteln und dessen Property COUNT abfragen ... dann kennst du die Anzahl der Objekte in jedem Layout und kannst dann darauf schließen wo gezeichnet wurde------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : aktive Zeichnung mit VBA abspeichern
CADmium am 14.04.2008 um 14:16 Uhr (0)
ne Methode Addd gibts nicht, max. Add , aber wenn du die Zeichnung speichern willst, mußt du die Methoden save bzw. saveas verwenden, und zwar die des Aktiven dokuments und nicht der Dokumentencollection...Das Beispiel aus der Hilfe lautet z.B. so:Sub Example_SaveAs() The following example saves current drawing as "test.dwg" ThisDrawing.SaveAs ("test.dwg") End Sub------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lö ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : verwendete Vorlage einer neuen Zeichnung abfragen
CADmium am 20.09.2007 um 12:37 Uhr (0)
IMHO wird von Hauses aus der Vorlagedateiname nicht mit in der Zeichnung gespeichert. Das kannst du aber ändern, in dem du z.B: deine DWT s mit einem entsprechenden Dictionary ausstattest, welches du dann in deiner Routine abfragst....------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : dwg-Zeichnung kopieren
CADmium am 02.06.2008 um 11:45 Uhr (0)
methode "saveas" des Documentes ....aus der mit F1 aufzurufenden Hilfe:Sub Example_SaveAs() The following example saves current drawing as "test.dwg" ThisDrawing.SaveAs ("test.dwg") End Sub------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Abfragen ob Block schon in der Zeichnung ist
CADmium am 12.07.2004 um 08:14 Uhr (0)
Werte einfach folgenden Ausdruck weiter aus : Set block = thisdrawing.Blocks( 40 ) ------------------ - Thomas -
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : vba tool mit jeder Zeichnung starten
CADmium am 23.04.2007 um 12:15 Uhr (0)
nutze vbaload und vbarun in Verbindung mit command und lies dir die Sache mit der acaddoc.lsp durch ..------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
CADmium am 15.03.2007 um 13:55 Uhr (0)
Den Wunsch zu haben ist doch ok. Woran hapert es nun?------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Alle Textstile und Textgröße in einer Zeichnung ändern
CADmium am 02.10.2012 um 19:22 Uhr (0)
Zitat:Original erstellt von Oliwoos: Besteht überhaupt die Möglichkeit dieses Problem mit Hilfe von VBA zu lösen?Ja. Denke schon.------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : zeichnung dürchsuchen - alle line auf vonlayer
CADmium am 31.10.2012 um 17:14 Uhr (0)
Dein Code geht durch die Layertabelle und sperrt alle Layer...und die Linienstärke eines Layers auf "VonLayer" setzen geht logischerweise nicht ...Den Befehl _setbylayer kennst du aber ? ------------------Also ich finde Unities gut ...--------------------------------------- - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Alle Textstile in einer Zeichnung ändern
CADmium am 24.09.2009 um 09:13 Uhr (1)
du schaltest den aktiven Textstil um .... ist eigentlich nur 1x sinnvoll .. nicht mehrmals in einer Schleife ... vielleicht eher so ?For i = 0 To allTextstyles.Count - 1 Set TextStyle = allTextstyles.Item(i) TextStyle.SetFont typeFace, Bold, Italic, charSet, PitchandFamilyNextThisDrawing.Regen acAllViewports------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
